MacFormat España 15

home *** CD-ROM | disk | FTP | other *** search

/ MacFormat España 15 / macformat_15.iso / Presenting OMO™ / POMO / exhibits / fashion.sta (.txt) < prev next >

Wrap

UltraCard Stack | 1995-07-28 | 984KB | 5,085 lines

CRDHnm1 CRDHscratch CRDHselections NM1SCRP on opencard doinit end opencard on closecard doreset end closecard itemcount 3card *GRPO 5INFO ^CARD botbutsdata ++BiO zINFO check2data ++BiO yINFO check1data ++BiO {INFO check3data ('++BiO xINFO XL3data ***+*>= =**++>+* =*******++ +*(4((())*+> >*(('('4())*+ =))''''''4())*+ >**4''2''4'((4**,, +*((''''''4(4)**+, ***#//'1 '+++,,- ,--,------------- --------- ------ ('4''++BiO wINFO L3data =*+>>>== 4*++*)*+ +**((4)4)+> >)(('4'4(4)+ >))('4''(4)4*, ))(4'''''(4)**, *+('''%%4'4(44*, **4(''2'''4())*+, >*)4(4''''4'4)*4+,, *))4''''4'4))**4+, >**4)4%%'(4))4**+,,, ---,---,---------- ---------- ------- >))(('''++BiO vINFO M3data >**(>>= =*)(((''* =**('((()*+ >*(((('(4()+ >))(('''4'4)*> >)*(4'''4'(()4*, *>))('%%''4(4)*++, )+*4('%'4''((4*4,, =)+))%%%2'4'''(*++,, *+*)4 !''(4%!#4*+,- ---,-,-,,-------- ------ ((''4'++BiO uINFO S3data >*>*>= ****())*>== 4*))())))+, *>(('('4(4)+, )*(((''4'4))*,, )*('''''((4)*+, )*(4''%''4(4)*+,, **4'''2'''4)4*4,,- )**(4''''4'(4)**+,, *+)4(''4'''4))4++,-- ++))4)40 0%**++,-- =++*4))1 1)+4,+,- =,+**4*0 1,2/ 4++,,,-- ,,++4++,40 1+,,,,--- =,,,,,, /+,,,-,-- =,-,,,,+1 ',,,-,--- t++BiO tINFO P3data '*)+,+>> ')(***++,, '*()4(4))*,, (()'4'((44)+,, )(((''4((4)*+,, (((4'''''4(4)+,,- 4(4''2''4'4)*4,,, 4'4''''2(''4))*+,-, --,-,,,-,,,-,-,------ ------,---------- ----- ++BiO sINFO XL2data ***+*>= =**++>+* =*******++ +*(4((())*+> >*(('('4())*+ =))''''''4())*+ >**4''2''4'((4**,, +*((''''''4(4)**+, ***#//'1 '+++,,- ,--,------------- --------- ------ ++BiO rINFO L2data =*+>>>== 4*++*)*+ +**((4)4)+> >)(('4'4(4)+ >))('4''(4)4*, ))(4'''''(4)**, *+('''%%4'4(44*, **4(''2'''4())*+, >*)4(4''''4'4)*4+,, *))4''''4'4))**4+, >**4)4%%'(4))4**+,,, ---,---,---------- ---------- ------- ++BiO qINFO M2data >**(>>= =*)(((''* =**('((()*+ >*(((('(4()+ >))(('''4'4)*> >)*(4'''4'(()4*, *>))('%%''4(4)*++, )+*4('%'4''((4*4,, =)+))%%%2'4'''(*++,, *+*)4 !''(4%!#4*+,- ---,-,-,,-------- ------ ++BiO pINFO S2data >*>*>= ****())*>== 4*))())))+, *>(('('4(4)+, )*(((''4'4))*,, )*('''''((4)*+, )*(4''%''4(4)*+,, **4'''2'''4)4*4,,- )**(4''''4'(4)**+,, *+)4(''4'''4))4++,-- ++))4)40 0%**++,-- =++*4))1 1)+4,+,- =,+**4*0 1,2/ 4++,,,-- ,,++4++,40 1+,,,,--- =,,,,,, /+,,,-,-- =,-,,,,+1 ',,,-,--- 3++BiO oINFO P2data '*)+,+>> ')(***++,, '*()4(4))*,, (()'4'((44)+,, )(((''4((4)*+,, (((4'''''4(4)+,,- 4(4''2''4'4)*4,,, 4'4''''2(''4))*+,-, --,-,,,-,,,-,-,------ ------,---------- ----- ++BiO nINFO XL1data ***+*>= =**++>+* =*******++ +*(4((())*+> >*(('('4())*+ =))''''''4())*+ >**4''2''4'((4**,, +*((''''''4(4)**+, ***#//'1 '+++,,- ,--,------------- --------- ------ ++BiO mINFO L1data =*+>>>== 4*++*)*+ +**((4)4)+> >)(('4'4(4)+ >))('4''(4)4*, ))(4'''''(4)**, *+('''%%4'4(44*, **4(''2'''4())*+, >*)4(4''''4'4)*4+,, *))4''''4'4))**4+, >**4)4%%'(4))4**+,,, ---,---,---------- ---------- ------- ++BiO lINFO M1data >**(>>= =*)(((''* =**('((()*+ >*(((('(4()+ >))(('''4'4)*> >)*(4'''4'(()4*, *>))('%%''4(4)*++, )+*4('%'4''((4*4,, =)+))%%%2'4'''(*++,, *+*)4 !''(4%!#4*+,- ---,-,-,,-------- ------ ++BiO kINFO S1data >*>*>= ****())*>== 4*))())))+, *>(('('4(4)+, )*(((''4'4))*,, )*('''''((4)*+, )*(4''%''4(4)*+,, **4'''2'''4)4*4,,- )**(4''''4'(4)**+,, *+)4(''4'''4))4++,-- ++))4)40 0%**++,-- =++*4))1 1)+4,+,- =,+**4*0 1,2/ 4++,,,-- ,,++4++,40 1+,,,,--- =,,,,,, /+,,,-,-- =,-,,,,+1 ',,,-,--- P1B++BiO jINFO P1data '*)+,+>> ')(***++,, '*()4(4))*,, (()'4'((44)+,, )(((''4((4)*+,, (((4'''''4(4)+,,- 4(4''2''4'4)*4,,, 4'4''''2(''4))*+,-, --,-,,,-,,,-,-,------ ------,---------- ----- tsBMAP ++BiO /INFO botbutsdata 0<&8. ;<779, 36>=(- .TAIL ++BiO but1data VVVzVV VVVUVU+ +O1VVyVU VVUzV n moused++BUT touch1SCRP on mousedown send "dotouch 1" to me end mousedown itemnum 16 itemprice 350TAIL d++BUT touch2SCRP on mousedown send "dotouch 2" to me end mousedown itemnum 17 itemprice 95TAIL used++BUT +INFO touch3SCRP on mousedown send "dotouch 3" to me end mousedown itemnum 18 itemprice 155TAIL mo++BUT DesignersSCRP on mousedown godesigners end mousedown ++BiO 1INFO high1data 70%07 (% 0 (*,( !!!,,+++ 77777 0%& 77/ 7777 7777 7777 7777 7 *-0 7/),0 7#,-0 007 0''%%%$ 70--- !!!((((((('''&&''& 0,--,&#/ /)-, --* 7 (-,(/ 0,?-0 -.+,,/ /+--?,??,?-??-?-?-?-????? %(?---- ,((+ &,(), .TAIL ++BiO 2INFO high2data !!!!. 07 ,00 0/00 $/7/0 7777 (7777 +-*77 77%,, (-070 *-%77 7 ,,77 707/* 07//7 ,*(,, *,(+, -((,- ,,(,- .TAIL subtota++TXT subtotalTAIL ++BUT View Selections $SCRP on mousedown goselections end mousedown ++BiO 3INFO high3data % / " 0&07 %( 07&07& !!!++++++**************((((*(,?,((*--((+--?-&&'(-?-)(-?-*,-*%--&%%)-,&%+?+&&&&'&&,?*''',-?-,(((((((((**(**(******??? 77777/ 77 777/ 7/*, 7/ 70*,% !!!'('''''&&''%'&&&%&%%&%7 /--$$ (-*(7 0-,( (--*07 (-,+( ---++,,,,,,,,,,?+,,?,???? .TAIL 4INFO high4data 77 77/0 0( 0" 77//77 77 77 $('07 (&"# $ "70,*7 !!!%%&%&%'&%%&%%&%&%&&&&&&&&'&'''& 0 *--,''00#--+()'1700*-?)00.-+**++*+++++++,,+,+,+,,,,,,??? .TAIL RunwaySCRP on mousedown send "goRunway NM,3634" to me end mousedown m++BUT Start OverSCRP on mousedown global gPomoPath stop bg timer 1 stop bg sound 1 lock screen go gPomoPath end mousedown GGRPO out1SCRP on mousedown send "dogroup 1" to me end mousedown gsize itemnum 16data nTAIL nTAIL ++BiO cover1data .TAIL .TAIL GGRPO "INFO out3SCRP on mousedown send "dogroup 3" to me end mousedown gsize itemnum 18data xTAIL xTAIL GGRPO out2SCRP on mousedown send "dogroup 2" to me end mousedown gsize itemnum 17data sTAIL sTAIL ++BiO )INFO cover3data =0ccZY +wwwqww vvuuvuuuuugguuu ~qnwwncn nuuvwwuwuwwuu~ ~uwqwquiici[YLDBEc +qqvququiqw} uncYciguuu wniiniu wunwwqwqwwq w}wququgii[gZYGDBV +w}u}uqu}u ququwwu~ viuvqvqwuwq wuwququig[c_VLDBGp ~~u}u}uuu~~~ wvqiq~ uwuwu}u wggqnuuqvquvqwwuw }uwquqgii[cYDEEB^ }u}}~ }wwu}qwquqggu ugcccggggniunqnuquuwwwu~v }uuwuuqgig[ZNBBSc ~uqqgqqgqgiggu wwuwqww}~~u}uwqiq uugnnuuuvquvquwwu u}uwuuqgigcHDBp ~www} uquqqgqqqgiqw}~ wwwuwqqvquqw}~~}w}qqu} wvquvwuwwww }uwqwqqgig_LBB{ ~wquqqqgqgiquwwquwqnqnunnquw~~~~u}wuu wvquwuwwu~vw~ ~u}wqwqqggi_GBI .=%R <TAIL <TAIL ++BiO cover2data wwuuvuvw uqnuwqwq~}w}~ wu~wwwu}wwwwuwwwwwuwu}wu~ wvwtw wwvuq uuvqwuwu}w~~ viqiq wuquuwww vvquuwwu}uu~ wwww~ ~wqii~ uuvuuuww ~uwuqquvqwwwu}wu~ wwwu~ ~uquwww}uw} vccgcgignnw ~uuu}uwuu wwwqwuqgggq }uqq} wwqnuvwu~ ~qnniiquqnquwwq wwwwwwwwwwuwuwuuqwu~ ~u}wu} qgggguuwuu vuggn }wqwqqu}u}u} qiununuqvuwwuwuwwuwwwwuwuwuwuuqvqunuquiguu} }uwu}wu~ wuiununuqvquwuwquwwuuuuuvuvquvuuunuunuigiuwu ~ncciqwwuqwqu}u uwuww} ucgunuuqvqnuuvuwuwuvuvw uuggw vuivw uucgw wuwwqvvu~ww wuigunnqnuvuwuwwuwuw ~uwww~ vngnuw wvqvqnww mTAIL ++BiO _INFO selectgraydata :5:: 1867;6 7964: 79597 66758 5675: 66759 3300000 1300000 3300000 1;:79 2232- 2-3-- 2232- 2232- .TAIL .TAIPPALT `INFO dCARD NM1data GGRPO rCARD group id 127data TBBMAP :9:::9:: 04,, 994+A 9!794 4729 qdddd mS9AMm, (88=(L 110766'd 8cZnn TuxcxOVV 0887'' 8?;? ! yv po 83>36 9#%020 ;62?:24 4482> |*&/? ,007+ 3?;2556244 :9=;> 441<=99;0 !9519 ;1770940 6:79> ?38>: 0712:: .*:>1 6>:2? jjjy 627:+fX ytj! 667= 88(}MA]0 I%;2?: 0D@GN:2 fvRb/ 712>6 46<2' kdkV.- Z098(CBu] kkxV%&5=0 899b}yK" hMjZ& YX$'* 138> 49=01 8+#NAIP 9.noV <<4<5 QbZVQQZ 49=9= 2YZhQ L99F#x ~CU[p uuYfbfhj 77;') <$8tm" Y9<5b[ rI^hM ?&#&%W^ wkyl# 3;,, :gKgq "upu\68 7!'#dp $ho&+A uQoo: gitAg luHZ/6/=6/(EEWPK@V] u|rpT [LSQQ tVh3tV) heo9Z DjHX*0 (xEWx 93Q^j| 3700Zd| 98woe\ 4490< 2907; )xsCg xHBP1 ";'=0 ++%+" _*"O+ D[@QupJ lxi8, =.SIVC< t&<N. +,TMEC23 Uu?!z |))hb& *(%#" *QKKt hf`plOhb'996-9; IK!>:2 RP]y' htiih.iZ k|aczL *(<#? 1I[\QLEYv jvtz{LY[5#'6" ,!'$% FFEE@Bc jpLJIKY@4/ jdLR#/ z{LR3; L>2Z6 7^!$CBX ,8/6m s|q]? # -475 -@F[h fNsk( #ERBo myF[&2 <0*J+ #EGWo m~qQ&0= xyvb$ -@GA} fsPI'= $h[y$ #@RKs cKPB6 +\rL% "0+K3- /96&o}mH |L[A. *\~Z/ -4+^agf }NLK, (@ZB{ dypg( 38CYv} jmPI=! (JME{ #.B[fk dVL;! #?U: ~ dyId* mbAxeic [hom? ,.D^`~ x|YK9. eaIR+-0 #.;#ck iYR>. #8Z.#.y haIV&(0-# xvY\1; ofpj!/ ooxoV.c 3400 mw}hmr wv\\90 -EPJx obwM!/ 0-%s_ Q|Q)j iA9tnoV 5noy\@ oscMo #8=\cx} wsg\ 1' wbNM!/ fA3vicQ 2}dycw xkl\1-, apnX== xxwl$6>, :JCVi y~MZ/0 |uVQ*; l&$ / ",'&'%$' :ENTq skVX.= xnwxwxwn }yuX;=8 ((!66388 =%^^cxxxxwx ?CPWy }kYX ; 3y#DC2 0GC[u ~kkk7;: "E+ !09Meu +--5;>:-?>5?228 %~bFE;- '.^Qj~} t%1&$ qjh1!! kQCN, -M464lp vhl%&:" 7N5>)ew ~hZ+&; _5@Y_ {:@xg ?eaZP4/ Hj,8) F/3|5}x F/3|5}x )1)Xj -!79?1 4903?( #0%[d .S'c a'!." /@Dt| ,)%Yfm ;$$, ;,'$fde 8iyTcyy` 6400= `>.&E6% i+:$ ("1==9 ~wgeeipql kte`f 1';'$ 5#nrn] uuwl3 }<zv{ $+/++ YP4 | vvpy vyvtvyp =000: $772?:9 uih2$ 09;9 Z@9Z8 989[M .4'2:& l@@{@@8 )&&8 R]$96 RA@AK LMLFL|8 2;|Y6+ PF}k###Vjf $++++ ++<;) 29;0*4*4 v9PAP3v ;99;833 5:::::858 .490: +=fz^+ $M[889M& LMvwvv~ :3:6 989K^ 8::88: L39K9SM )QMwg0 ++/++ [&[[SPZ ??>?> Mwquo ;;=5; uevhT }V.$' noxzwfYb | pp| qz 0994 km;%$$ [kyutn][$8 ;-.%gP $56D _8@Y_ 95=63; 06%eb`X ?8887 8?6?9 *999= 823888>5 28888 tonop [Hb$> QYVy ." ?0*0 x sz}r ;9=999 }wpsu}} ?62!,&$ }zu`l jub}u} jc!'21 \)uyqqq u}uoy }yuqqqyu} Jvl*/17 y}}}q %-<?4 y|vy|y 6% >/ p}VP?; q`yk(84- &=MUcp| 0(.0/ xpMQ:1 "791: ;$XXc| >?>>> ><?>> (>34& *kq}o D;::::+ h}yV(8$ #29/e d}og/(>> &''.9 K9;+- *=>6 99994 /gbbq ttnkj '6?=&" 9999999 %\Pcf 9994// 77:58 =8886) ]7782 4>;, |y|yp kFFFPX |||pp pypyt ::::5 7=:; /++/+ ::::: 88888/// :;:4- -,9(, y||||y|||y| +FrxR: ;=?; 7:;; +&RrAC. !4rvGR o]X'29. $;:::: |ypf cbj||yvv| ||p|| ||||||| |v|||v tsrwAK.movpgg into gFSHorditems put empty into gFSHcarditems put empty into gFSHindexitems put 0 into gFSHsubtotal end openstack on doglobalreset lock screen put the short id of this card into cardid go cd ET1 send doreset to cd "ET1" movie id 1SCRP on stopmovie global gPathAudio, gPathVideo if the currentmov of bg mov 1 is "intro" then release bg mov 1 gonavigator else set the moviefile of bg mov 1 to gPathVideo&"open1.mov" set the currentmov of bg mov 1 to "intro" go cd "designers" set the keyenabled of bg mov 1 to true prepare bg mov 1 set the soundFile of bg snd 1 to gPathAudio&"1B.aif" play bg snd 1 play bg mov 1 end if end stopmovie curmode release currentmov AKEXTI 'NAME userhintSCRP on ringalarm global gFSHuserhint global gNAVepcotpath global gFSHenablecard if gFSHenablecard then put quote & gNAVepcotpath & ":fashion:sounds:userhint" & gFSHuserhint & quote into hintname do "play file" && hintname && "nowait" --if gFSHuserhint > 2 then --and gFSHuserhint < 6 --ring bg alarm timedone at 2000 --end if end if end ringalarm Gigi:POMOCD:Presenting OMO :exhibits:Audio:3A.aif dio:3A.aif sound id 7EXTI 1400, playhint userhintSCRP on playhint global gNAVepcotpath set the playVolume of background sound 1 to 100 --set the soundFile of background sound 1 to gNAVepcotpath & ":fashion:sounds:userhint3" set the soundFile of background sound 1 to gNAVepcotpath & "userhint3" play background sound 1 end playhint selectionsSCRP on docalc global gFSHsubtotal, gFSHorditems, gFSHnumordered, gFSHsizeitems global gFSHuserhint, gFSHcardtype global gPathAudio lock screen put "selections" into gFSHcardtype put 6 into gFSHuserhint put empty into cd lst "selected items" repeat with i = 1 to gFSHnumordered put line (item i of gFSHorditems) of cd fld "outfits" into row i of cd lst "selected items" put item i of gFSHsizeitems into cell i, 5 of cd lst "selected items" end repeat repeat with i = 1 to gFSHnumordered do "show cd bmp but" & i if i = 7 then exit repeat end repeat if gFSHnumordered > 7 then show cd bmp downarrow show cd btn downclick end if hide cd fld "wait" -- Put the comma in the right place in the subtotal. if gFSHsubtotal > 999 then if gFSHsubtotal > 9999 then put "$" & char 1 to 2 of gFSHsubtotal & "," & char 3 to 5 of gFSHsubtotal & "." into cd fld "total" else put "$" & char 1 of gFSHsubtotal & "," & char 2 to 4 of gFSHsubtotal & "." into cd fld "total" end if else put "$ " & gFSHsubtotal & "." into cd fld "total" end if if cd fld "total" is not 0 then hide cd bmp purchase else show cd fld noitems end if unlock screen set the Messages of background timer "userhint" to "1000,playhint" start background timer "userhint" end docalc on closecard global gFSHsubtotal stop bg timer userhint show cd bmp "purchase" repeat with i = 1 to 7 do "hide cd bmp but" & i end repeat hide cd bmp downarrow hide cd btn downclick hide cd bmp uparrow hide cd btn upclick hide cd fld noitems hide cd bmp deshigh end closecard -- Utilities for development on showhigh repeat with i = 1 to 7 do "show cd bmp high" & i end repeat show cd bmp highup show cd bmp highdown end showhigh on showbuts repeat with i = 1 to 7 do "show cd bmp but" & i end repeat show cd bmp uparrow show cd bmp downarrow end showbuts on hidebuts repeat with i = 1 to 7 do "hide cd bmp but" & i end repeat hide cd bmp uparrow hide cd bmp downarrow end hidebuts on hidehigh repeat with i = 1 to 7 do "hide cd bmp high" & i end repeat hide cd bmp highup hide cd bmp highdown end hidehigh on hidepurch hide cd bmp purchase hide cd fld purchase hide cd fld wait end hidepurch on showpurch show cd bmp purchase end showpurch movtime 0card +GRPO 0INFO zCARD allbutsdata sdata /INFO highsdata .TAIL sdata "INFO YCARD group id 34data %INFO sohighdata 77 77/0 0( 0" 77//77 77 77 $('07 (&"# $ "70,*7 !!!%%&%&%'&%%&%%&%&%&&&&&&&&'&'''& 0 *--,''00#--+()'1700*-?)00.-+**++*+++++++,,+,+,+,,,,,,??? .TAIL $INFO purchhighdata %&%? %%%- 7 %// 7 %// %&%, 77777/ 7777 7777 *,17/ 7/+,0 7 +-0 0'&(, /70(+$ %&%, %%07 ?- ,0/-, ?-'/0+?, (,(), .TAIL #INFO deshighdata 70%07 (% 0 (*,( !!!,,+++ 77777 0%& 77/ 7777 7777 7777 7777 7 *-0 7/),0 7#,-0 007 0''%%%$ 70--- !!!((((((('''&&''& 0,--,&#/ /)-, --* 7 (-,(/ 0,?-0 -.+,,/ /+--?,??,?-??-?-?-?-????? %(?---- ,((+ &,(), .TAIL but1data <<88<<<;8877878777 7888888778 77777 <<<<<8 <<<<<<;< <<8<< =========== <<<<<< <<;<8 !&>&) 8<<8888 shape id 3TAIL INF+TXT totaldata $ 350.TAIL field id 6data TotalTAIL button id 10SCRP on mousedown global gFSHenablecard put true into gFSHenablecard if gFShenablecard then put false into gFSHenablecard show cd bmp sohigh lock screen hide cd bmp sohigh resetstack gonavigator end if end mousedown hide cd bmp+BUT button id 11SCRP on mousedown global gPathAudio, gFShenablecard put true into gFShenablecard if gFShenablecard then show cd bmp purchhigh put false into gFSHenablecard stop bg sound 1 --play stop stop bg timer "userhint" put false into gFSHenablecard lock screen show cd bmp purchase show cd fld "purchase" unlock screen set the soundfile of background sound 1 to gPathAudio&"6A.aif" play background sound 1 lock screen hide cd bmp purchhigh wait 300 hide cd fld purchase resetstack gonavigator end if end mousedown nd 1 to gNAVepc+BUT button id 12SCRP on mousedown global gFSHenablecard if gFSHenablecard then show cd bmp "deshigh" godesigners end if end mousedown e+BiO but2data ;<8<;77 888888888887777777 7778878 888;<;<< 888788777788 7777888888 878878 87777788788 77;<;<<7; 877777 877777878888 7;<;;<<; 8787778787 88877 <<<88;= 77777 77778 >>>>>> ..<<.9> <<<<<< 7777777 but4data 77888 <7<<8<<<<<<<; <<<<< 8;<<8 87;;;;88 <<<<8<<<<< ;;<;8 <8<<<<<<;;;8< ;<;;88; 8;;;;88 <<<<<<<<< ;<;<7;;;877 <<<<<< <;<;;< **-".) ..9995 ========== &***) %"") <<777 <+BiO but5data <777777787 %%%"% ""-%" .%-)) %"%%%"" )))))) )&)%% <<<<<< 0<1<< <<<1< <<<<<<<< ;<<;<<<< ;<<<<<<< <<<<<<<<<< ====== <<<<<<< <<<8< ..%%.% #%.%. <<<<<<< <<<<<< .%...- -.%%% <;<<<< but6data <<<<88<88< <<<<<<< 7788878 888<<< <<<<8<<8< ;;;<; <<<88<<<8<<8< <878888 <877788778788;< 8;<<<8 877877888 <<<<<<<< 878878 <<;<<<<< <<<;< <;<<; <<<<<; <<<<; <<<<8 <<<<<<< <<<<; <<<<< <<<<; but7data <<<<<< <<<<<<<<8778888<< <<<<<< <<<<;<<< <<<<< 8777788 <<<<<8 <<8<<<<< 87788 <<<<<< --)*- <<<<< 8888< <<<<8 <;<;;;<<8;<<<<<<8< <<<878 *..%(%) .%.%) <;8888 <<<<<<< >>>>9 <<<<< 1<<<<< <<<<<<<< <<8<<<8< <<<<< <<<8<<<< <<0<<<8<< <<<<<<<8<<<<<<< <8<<; <+BiO but3data <<;<< <<<<<;888887 %%%%%% ;88778888/8<<< 8878<888 88<<<<< <<<<<< <<<<<8 ;;;7; ;;;;; ===== 78;;;;; uparrowSCRP 887778 88777 8888788 8878; 887788888 888878< 8;877777 --)-* 8888888 ;77777 <<878 777777 <<<<<88 <<<8<<<<< 88877777 ===== 8777778 <<<<<<< ===== 777777 <<88<< ===== <<<<< <<8<<0< 0<8888/8 <<<<<< 8<8<8<< <8<</ <88877 <<<8< <<<<= 88878 88887 888877 887777 8888877 88877777 8878777 8887788 777888888 78888888 777787777 88888887 .TAIL 888887+BiO downarrowdata <<;<8;< <<8<<; 1<<<< <<<<<<< 1<<<<< <<8<<< <8<8<< <<<<; <<<;; <<<;< <;<<<;;;; <;<;;; <8<<; <;<<;<; <<<1< <<<<< <<<<< <8<<8< <<<;8 <<<<;<<<<< <;;;;<<<<< <<8;< <8<<<; <;;<<<<< <<;<< <;<;<;; <<<<<< <<;<<< .%.%.% <<<<;;<<;;;;;;<<<< ..""% <;<;;< <<<<<<< <;<<; <<;<; 9TAIL butsdata $"*$*$ {^""$Q ddddd +""P$# {+*Q_ $_$+$% $%${$ ?$$$$ $Q%$${ $$$$% +*%*$ $$$$$$ ~dddd *$$$% #$$""$$ $$$$$ P%+*_ z""$$ $$$$$ $#%$$"%%$"$% ,$#+" %#%,$ $$Mj[+Lj[ $$$$$$_ $%$%$ _#$${ ~Z~tUZ~P ++%"%+ {-_$* *%"$$ $$$^$$%_ $$$$%$$$ {$$$$ #_^*Q kP+++ $$$$$$ $$$$$ +jsD$$$ E$r`r+[ )P_#P ^Q+$"WNt P*,_" _-%-$+ O*+k% edeed P$+$_ $$$%$ *$$_*$"^$ [t[yZ [l%T[N++ ***^* ""{%##P kddde dddde ZtZ_[P [xTT[T |$-""**# P*-$^* *^$$$ *{%$$^ %"%-% $$$%_ +$%$$$ d{dd~ _%$$_%$$_ Ot[$A [STQT $_X%$$PiPt ~TW,% jddddj {$*$_{Q$$__$$$$$$ $$$-$%$#_$ tat$t VU</" $_#$$_# %#%+$%+$$*+ %%"$%_"# $$+[[j ddeddd +a[++ *dWd0 [O[t$: ,$$"$$ +[Z$+[ Z*$ZyZZ ++$+$% %+$$$ %$*$$ P%$$$_/ $$+*% %$$$$ rP[t$t [+$[[T $$$$$%$$ PQ#QQ K[$KE ?{dVda ddd+O [.y[/0y[ `Z[r%# }%"$_ PZU_PZ| d~ddj jxr+N Zx%TT {^{d{ $+$$$* $$$$$$ VUTKOY t[$N_ [%PT[{[TWP[yV ^-%,^ $+$%IT[}m Y[TT[ gPTNx sAUTZT +ZU[T T[TP+ "kTTZ%/Tx@, [MUKZT sKUX+KUXV [UV+[[ UW{TZ }u -k -$$$$% $+%+$ $$$$$%%$$$$ $$$$$$%$$$$$$$$ %%%""_ %*%_$Q$ "%_#_"#%$ #ZT{+ Wb"Qd2% #"$%$$$$$$$ Vb}2Vdddd $%#_$$$ STT^ }YuqP- ^$%$Q $#$O[r +[[[K _%Z[_~V[K }VYV}XrY WV}V3V Oded~k- %+_*% %*%_*$%_ ZTZTTZz T$_$$ TASATS} b#("a #%*%_" %"$%$ $$$%$_$$$$$$ $$$$$ $$$$$$$$$$$_"%%$*$%$" TZT_#zS Q$_$*% %%$$$$$$$$ $$$$%# +-~dcdddddddddddddj d~>~d b$$$$S #%+%+ P+$$$+ #"_%" $+$*%$$*$%%$$$$$$$$ $$$$% $$*%% %"Q$+ _$+%$$ %b-d*%_$ $$$$$$ $$$$$$ edde+ +$#*% _"_*_*% #$+$*$ $*$%$$$$$ {$$$$$$$ $$$$[ $$$$$ $$%$% %$$$$%$$_%$* $$$$%$ $$$$$$$$%$$%% AX#A:&<Xu *$$$$ $$%+**_$ WATK[T KZUZT[ TT<EA u4t %# *[yt+[T/ U~kJxZ[UxZTTTT {$$$$$$ XUY|XUY{d /P$$[ $_X$$$+A &/+$$$$ $$$$$%%$$$$$$$_X$% Vbbbbc #$%"#$ $_$$$$$$$$$$ $$$$$$$$$$$$$$$%$ "^$$" { KT$R 1d,4$ YZ[%$Z [P`Xr[`T(TD~Z- }KT[TV TT:_T V[[j+[ [ZWU~[PU~[ ) XWt , $%$$$ _XVcXXXd $$$%$$$ $$$$$$ r,Z[P%% _"ST#} +$$DT " PT""NT[- _Z"TTX}TTV dW}UA $^"#$ T<zW+e# %#$$$%$$: +$%,$ V_AYQ_AY X{VV [[Y$$ )/N+r -:}|{uP $%$${ VNTT{OUx TTX_//XXuP %{ $$Q $$$$$$$$[`[D $$$$$$ }utP+utPr#$ [ZPt$Z )+t[T+ ###PZfZ SUZy ^yZUQ QTTTU_U OFK|Vb, ,t#""$ -^^ET VXTS YDPV$E_" ZA$yZ@uyZ zK_U-K;UX }KTS" 0}-M/ [T[P$T [[sY" $,ZT~ UTTZU OX;XV}ddWd WV_TS /0S<{d _OR1 AUdX <_}Wj ++[ZT M[PE2 -NxV"A XX{Y| t+ZM/j Tt/KTQx U_X-M_Xu %$$$$$$_%$%$$$$$$$$$ %$%$$$$% %$_"% *%$#% _"#$$$$$YtT _TTZTZT$ QKZTZTD$ +_{$+ {V{AX/ $bbdW #%$"# $_$%$$$$$$$ $$$$$$$$$$$$$_"$ $$*$*$%%%$ $$$$$ *%$*%# ,UAS$ '{VZT ZyZ[s }K.X" %+$#$ uXTX/ /"$<{}| |e*Pt*$} OT__</__}u $FF={} )tZT< T[t{0 Y`[Z+% {UUA$ "FA<z }}*Vr+X+ $$$$$ *^_+%"_+ V__S cXTk+QTk, /NXU{ ,UdIj+ t+W{sUV WzVU} $%$$*$$ tBJ_T_XX 6$M;!_#X V}[}Pd, srZVX+| [$$tt[6 )+$VZyDU XUXKXAXz_ KXAXr {{zWU{< {|{VyQW,+, $#%$$ KTX$X "/0M_;_X}{{ [Zt"#Y[ *W TTZ_VzN|UTT_V{ jedjed dedkdj UededdUe d{c^a+ %$$$%$$%$$$$$$%%$$$$$$_$$** ((*A, _$$%$# [ET[ZV% $$$j[}$$ [$$$$$VNE[ P$$$%t[T[$+[ $$$Z[TT W$$%O[ r$+s[TKZ <#z^VV ddd{"{$. %*%$$% {$$$_$*%$_ XWV}Q0X $_*%#$% jededHk (}R{} V}UF ) Z!d[~Zj {Z#a# %|XL} {VAR: %#LAdu _|XU + $__"* + VUXF $%##{} nt[TLu[[[~[Z( -dk_# $$$$$ {X1R# *"VYWu, ddVdd}- %#RQ}{ VQ$M ##"R!{" VDtT/ T[[X- YQytVPxt-tzPl$ /B#V{ qddd~d dVdV=+ d}VVN -Y{]2 *%%$$ "^{#" O/VUNd *VWAX QzQRR< .d.Y" ((%R( %(#(%( {d-ddd2~ d~2VdL>-{+!## {ddL"{{ RU*WW "%$"$$$ uV}Q# |%+^c}-c2 *XX,$ XYK_ " $X}2{ X"Y{d" _;RV k, 4$$$$$"$ {YcVW d=^]2@|!V "{Y|"bY|bb dYQ{b{V +VXX: Q_+*P$ {V2c}-+ $-b-Y--+V -V.A9+ ~Y}}"Z ={YV>b :%%<0 _1QVVu Y _$$$$ $%$$*%$$%$$$ VVKURz^ 6-""#<L.$Q Y2t+X 2s}X{XU VVUK_TA_ X$AK}{ Q_Q_# gd{}{{d{ZY{{dZ Ve}dddZdd dc}d{Y!^2 z2RX{[ YVrUD@ AUXBz_F+ _+*%Q$+++_++ %+*#^ 1_UAUZU AAEUAAA_UAX 0zbbV{{ P"_X++ edddd O~{b-' "#C|Y{~ ,Q%$Q^$+_ #$,",N V{"{+- {~dd! b22V2] (+%%#L U+2z}{b{ k|d*kP*$ ,$kIe {^ba{z "^c@" %,%%^ $%+P" $|""z" dUe~d 2c^Odz^2 *|}}P- N,{OW- V~Odd{ _{*$|$%#" $}#Q*{#} |~QdQdO32V *#kQk j*+^,",% j,k,jP selected itemsSCRP on mousedown rownum global gFSHcomefromselections, gFSHenablecard if gFSHenablecard then if row rownum of me is not empty then put the vertical linescroll of cd lst 1 into linenum put rownum - linenum +1 into realline do "show cd bmp high" & realline put cell rownum,7 of me into cardid realize cd palette cardid lock screen do "hide cd bmp high" & realline put true into gFSHcomefromselections put false into gFSHenablecard go card cardid end if end if end mousedown on mouseup rownum --hide cursor end mouseup MOCELL10 N. Miller, Micro Blue Slouch Coat, $350. &INFO high1data <<88<<<;8877878777 7888888778 777777 <<<88<<< 8778788877788 777888888 887777787887 /<<<8<< 7778888887788 7777788877 787878 /877888787 <<<<<8 00 1111 !!%%'4# 0 7878<8 <<<8< %'%%1!1 11 1%%%44+4+4# <<<<<<; %)*4%%%%%%'4%444*+,=== 00.//> <<8<<< ======= <<<<< /7778; ======= 'INFO high2data ;<8<;77 888888888887777777 777887 888;<;<< 888788777788 777788888 878878 8777778878 77;<;<<7; 877777 87777787888 7;<;;<<; 878777878 <1%!111 1011 !%%4'4+,40 88877 <<<88 1'%!1!11101 1!1'%444,+4# ++++++* /#/#//. 999>5>>> (INFO high4data 777777< <8<8<8<;;;88<<<< )**--)-!-% 77888 <7<<8<<<<<<<; <<;8; 87;;;;88 <<<<8<<<<< ;;;<;8 <8<<<<<<;<;8< ;;<;;88; 8;;;;88 <<<<<<<< ;<;<;;< <;<;< 1 111 !!#%'4# <<<<; #! 11001 1 1%%4'44+4 '%#11 11 111 !%%%44+,,4( 4%%%#11 1101 1!1'4%444,,4! < ''%1%1 11 11 !%%%444,,,4% )4'%#1!1 11 1!1%%4'44,4,,= *)%##1%!##14%44*,, 0.%& (9.90"" ======== ""*** <<<<<<8 &***) )INFO high5data <<<<;< 8787788 ;;<<< 888878 887888<<< ;;;;<< %"%%%"" )))))) <<<<<< 1<1<11111 1%%%44# <<<<<111!1111 111! %%'444+4 <<1%%%%!1 111111 #%%%4444,,4 <;<<< %4%1%1 1 11 1 1%%4%4+,,,,! <<<<<<<<<<%44%%1!1 1 1 !#1%%4444,44 ;;<<<<<<< ,+*)+++,= <<<<< 999999 <<<<<<< <<<8< ..%%.% <<<<<<<< <<<<<< <;<88<<<< <;<<<< !!%%%% *INFO high6data 888<<< <<<<8<<8<<<<< ;;;<; <<<88<<<8<< <878888 <877788778788;< 8;<<<8 877877888 <<<<<<<< 878878 <<;<<<<< 0 1111 #%%4(%#1 <<<;< 4%%%1 1110111 1%%%444,,,4# <;<<< %4%%#1!1 !1%%%4444,444 '(4%%%!#1!!1%1%%%4)44,+=== '=4''%%1%%%'4444++, 00/"$ <<<<<; <<<<; <<<<<<8 <<<<<<< <<<<; <<<<< <<<<; <<<<<;; <<<<<< +INFO high7data <<<<;<<< <<<<< 8777788 8<<<<<< <<<<<<<8 <<8<<<<< 87788 <<<<8<< --)*- <<<<<< 8888< <<<<8 .)("() *-..." <<<<<< #1 111 11 1%%%444+4 <<<1!#1#1 1101 11%1'4'4+,,+4 44%%%!1 1!!1%%%44444,, =)=*+*+++* =9././//. >>>>> .<9999 1<<<1< <<<<< <<8<<<8< <8<<;8 <<<<< <8<<<<<<<<8<<<<8<< 7<<88< <<<<<<<8<<<<<<< <8<<; <<<;< 0<1<<<<<<8<; 7<<88<<<< <8<<;8 ;+BiO ,INFO high3data <<<<< <<;<< 8<<<;887887 %.!%! %%%%%% ;88778888/8<< 8878<888 888<<< <<<<<< <<<<<8 0 11111!%%444%#0 1#!1 1 11 1%%%444,4 %%#!1110011 1%1'%44+,,,% 4%%%#1 1 111 1#1%%444,,,4' %4%%1%1 1 1 1!#%%4'4*4,4, =*%%%%!%#%%%%4%4+++ ;;;7; =**))))* 99..-!-!# 995954 ===== ..... 78;;;;; ;;;;<<< <<<<<<<<< -INFO highupSCRP on mouseup lock screen put the vertical linescroll of cd lst 1 - 1 into newscroll set the vertical linescroll of cd lst 1 to newscroll put the number of lines of cd lst 1 into numlines show cd bmp downarrow if newscroll is 1 then hide me end if end mouseup 8<8<8887788 8888788 8878; 887788888 888878< 8;87777 --)-* 8<<<<<88 (##%4?? 8<<<<<<< '%%#4? 77777 <<88<< #%%%%??= ;<<<<<< 4%4%4%4??= 8<8<8< <<8<</ +%444444+?? <8887 <<<<8< =444444444??= <<<<<=44+4+4+4+4+44?? ,+4,???44???,,,?. <<<<< ?,4??= ?,-?? 888877 <8878777 88887788 ?--?? &>)-??-- ;8877878777 788888877 .TAIL --?+BiO .INFO highdownSCRP on mouseup lock screen put the vertical linescroll of cd lst 1 + 1 into newscroll set the vertical linescroll of cd lst 1 to newscroll put the number of lines of cd lst 1 into numlines show cd bmp uparrow if numlines-6 is newscroll then hide me end if end mouseup <<<<<8<< <<8<<; <<;<8;< <<8<<; 1<<<< ?--??<<<<<<< <<?--?? 1<<<<< ?--?? <<8<<< <<<8<< <?--?? 8<88<< ,-?? ?,,?? <<<<; ,,?. <8<<<;; <<<;< ?,,?? <;;<<;;;; ,,?. 8<<;;<; <8<<; ?4,?? 4,?? <;<<;<; 4,,-??4,?? ?+4??=< ='4%4%44'?. %%4#4#???= %4#4#4?.= (%%#%4 %14?? <<<1< <<<<< <8<<8< <<<<;8 <<<<;<<<<< <;;;;<<<<< <<8;< <<;<<; <;;<< <<;<< <;<;<;;;<<<<<< <<;<<< .%.%.% <<<<;;<<;;;;;;<<<< ..""% <;<;;< <<<<<<< <;<<; <<;<; 9TAIL purchasedata %%%%&%%% %%%%% %%%%%% %%%.% %%%%. .%"... %%%%% %%%%% %%%%%%%%% %%%%...%& %...%..%. &&&&&& %%%%%% %%%%%% %%%%. ...%%%% .%%%%% ..%%% &%&%%%&% &&%%% %%.%% %%+%% (%%%& &&&&&&& ..%).%%% "%%%%% &%%(%(& %%%&% ")".% %%%%%%% %%%%% %%%%%& %&%%%%%%%%% %%%%%%%& %.%%%%% &%&%% )%""" %%%%%& .%.%%& "%"%. %%"%% %.%%%.%% %%%%% %%%% %&%&% &&%&&& &%.%% &((&& +(&&(%. &%.&%&'& %%&+&& "% !# .%%&& %&+&%%% &''&&& &&&%& % %%&% %&##% &&&& &&&## % *&&%%%& +)-%% %.%.%% ()+)))**% #%%%& .%%%% %%%&(&% &&&&+% #""""%%"" %%%%% (%%%% &&%%+&' .#"%" "%%%%% "%%."" %%&&&# ##"&#& &+&&&& """ """"" -%&%(% %&&&&% ((()) %%%# 5&&&% **+-% 777777 &%) % 7&77.. 77777 77777 777777 777777 )*+) :7777777 777777 77777 77:777 <77777777 ))&&) 77777 +%#%% 777777 ..--& 77777 -.+-& 77777 777777 778:< 77777 "&%%& 77777 77777777 7777777 77777 ))+)) :877777 *)-.% 77777 %%%(% 7&&7(7 777777 77777 7777777 7777777 77)7) 77777 777777 77777 &&)))& 778877 7777777 :888878:<; 7777777 <99799< 77787877777<:9:888::8778: 888;77777777:; 887::77 778::::77 8:877 77787777777;7:7 7:777 77777 777777 7777 887887 777777 777777 77778 77777777 77777777:777:7 7777777777777777779999<8 :<<<<<9;89<;8<<<<8::7: ::9<9<7997 8::7:: 7:98:7<8988:787:;7::7 ;<:8:<;<< 878:<<<<<<<<: 877788 87777777 8888777 ;;:88<<< 77777 777777 777777 -%%%. <<99<<<< <89899< <<<<<<9<:::97:<:9 <;;:888: :77777 777:;:88:: 78;::: 77898;77777:777777 777:77:7 77777 787777 777777777 77777777 7::777 7:77777 7777777:77 777:777778998:8<8: ;<<9898 ;;:98<9< <<9:88;:;88<9<98989:877888 8:7<8/ 98<<97777777787779:< 8;<77777 77788888 77777 77777 777:: -***+* 777777 777777 77787 777777 77777 77777777 788:7 ())&) 77777 777777777777 &+++) 77777777 77777 777777 +***+ )&))% 77777 77777 77777 77777 .%%%% 77777777777 77777 <<<<<<< <<<<< <8988;:7 7787777 888987887888877777888888778: 88888 ;87887;;77 77777777777 78:;7;9877877777777 777777 77777777 777777777777 88888877889<777 77777 7:777 77777 77777:7:9<99<<87799 787777777 7777777777 77:777777 77788:7 878777777 77777779;:: 78<9<:8:<<<<9977778::78;;878797 87777778:98 8779:< 77788 <9<;;:;<8; 777777 &)&&)) 77777777 77&+- 7&&88 7777& ))))& 77777 777777 777777 777777 78:<;: )&)+) 777::77 777777 77777 77777 777777 77777778 777787 77777 7777777 777777 77777 77777 77777 87777 8&)&7 %...% ())&&) --)+*%% -"..% :;;:<<<<99<<< 877878 777787 7777878999987777787887 :8:<<<;<: 777777 8:7788:;;:;9;< :;978:7 :9788 8777777777:8;8; <7877 778989889<<<7777 77777 7777787 77777 77777777< 777777 777777 7777777 7777777 <:9888888 8;<8: 887788:7:;:;7 7777779::;<;;: ;:9<7<: 888:8878 :;8:;<;;;<<<;: ;;<<;; ;;:::; 87888 #""(%% 77777 777777 77777 &(8888 77777 &&&&(&%% 7777788 77777 77777777 77777 .".)) %%%%%"%"& 77777) 77777 77777 97777 :7777 777777777 77777 8&)77 77777 778877 77777 777777 ))&&+ .%.%% ..%") 777777 7777777 77777 ..%%.%) 77777 &8777 .%.%% )))))& 777777 &&877 %%%".) 77777 77777 ))"") 7777& 7777777777 778877 ))))& 77777 777777 77777 +)+)& %"%%%% 777777 77777 "%"%%" &&&". 7&:&:( +++**(*" "!-%%&& .""%) %".%% 777777)* 777777 &)))) +++)+ %%.%. 777777 7778777 7788777 7778&& 7777) ""))"). ""))" &77777 &&&+& ")"""" ")""" ....))# +++)+ %%%.% -%%%% 77777 77777 988777 %.%)%%. <<88< <<<8<;< 9;<<:;< ;88888788788877 77777787 7788777:;7<:7 7:<9;:78 78888777777 7777777 777:7788777877::888 78998878889999 :8<<<99 ;<<;788878 8:;:88 8887778:888::787777:78;887788797<77 887787 88878 799<99::8777 789<:9<9878<7< 788788:9 <<<<;<;;: 78:;898<8 777777:7<<<<<88 :77777777 9877:;;;: ;87777877<<9::8 <;87:7 :;;;7;;< #"%%% 77777 777777 %")""# 777777 777778 .%%%%%%%. %%%"%" 777777 7777777 7777777 .%...%.%%%%%& %.%%%%% %##!! "%"(% 77777 %.%%%% )"..% 777777 .%%%%.% 77777 8777777 .#"%"""""" 7777777 :87779 77777 777778887 * %#"&5 777777 77777 &% !&6 77777777- "%"%#- 777777 .)-."! #%%%% %%%.%% 77777 "-")"% 777777 *6 %% %%%%% %".%% %%%%%% %%..)&8 )"""" 8777777 "...)" """"""#" <8888 <:<-- #%.%% %%%%%%%% %%%%." 77777 &((*+ )"")" %%%%%%% %%%%%.%%% ****- 777777 79--) % % %% %%%)% %..(%. *-*-- 7777777777 %%%%&.. .%...% &())& .%%%%% 77777 ))&)& %6%%%"-*+** -"%%% )&()( &)+*)&&&&& &)+++ %.%%. ))""" &*)"" 77777778) 77777 777777 ++))) 777777 77777 %"".) .")". #+%-- ))&)+ +&+&( 77777777 )&&&: 7777777 777777 % %.% %"""") )%%." 7777777 %.%%% %% "! )()))&&&& #<.-+8 %%%% &:&&-( %..%" "")"))) )&&))&& 7777777 .%%%8 )""".%"# 7777:7: :7:88:97 "%%%" 87777 %#."- %%%%))# !.%%%) )(+)) 77777 -#%%% ))%." -% % )&)))&)) *#.%.%% 77777& 777778 %%%%- 777777 %%% .%% 77777 -*)*) +))))+ 777777 7777777 ))-%! -%% % ))**)* 7777777 888/8 .%..% 898/88/ %%%.% 777777 &-%% * -&777 788777 <<<<; ;;;;899: 88;<; 788:<9; <;889<<<<<:878 <<9<<:878878 78:;<:<<<<<<<9:9<99<;<<<;999 ;<;<<;;;: ;;9<9;<< :<<<<< <<;:<<: :;;::: 99;:<<<<<<<<9<<<<;:9: ::<<9<<:<::9<< :;:9<9 <<<<<<< <9;;;<;;::9<<;:9<:<7777787788777<<<:78887777 8<798:9<<8777 7779<9:899 77777 9<;;;;;::7897777777 78;:8:;8 77777 88778 <98778879 <99<899<99 88988 <<;;;;;; ;;;:7:;;;;7;;;;;;;:77:7777:77888777< 777777+* *)**** %%"%" ))+-- 88887 .%%-% ))&++ )")"" "%."% 77777777 %%%%)%%% 7777777 "&&%!" %)+--++ 777777 77777 %%%. .%%." ) .# &((+* . .) %%%% 7777777 877777 %%%%.% -%%%% %..%% 777777 %%.%% %.%. """)" ."""" .% %%% 77777 <<9::;<; 8)&&& ")%)% ))")* )&))+%. *+)+( %%%%%% %% "%%" %.%%% ..""%) 77788 77777 77777 )+*+( )777777 %.%%% 777777 %%%%% 87777 !).) #.#)"%. )+- .% &**+& *(%%& %.%%%+%.% % .%.% %%%"%# .%%%.% 777777 )(&)& %"%%%""( ))))) *)+** --... %&%&% +)&)*+ %...- ))777 +)&&( *(+)( (.)%%. *)+&++ .%.%.. .-%%% 77778 %%%. --(-( ).%%.% ***-** %%% %6%% &%%&%% ))++- .%%%% (%.%%%%% #%%--- &%%%%%% (+++( &7777 )(--- 777777 :+)+) 7&))) %&&+%+ ))))) )))+-% +)((+ )7+&) .%.%.%%%%.% %%%%%% ("#!# &&%*&% %%%%%% %.%%%%% )++)) 777++ &%*&& %.%% % )())) )))))) 777&< %%%.% ")!#) ))))) ".%"- **))( %.%%%"""% *)"%."%"! &)**- %%% +))++* +)))) (%%)%&%6 87777 %%%%% ! %%%%&%% &%%(- "%%%% %%%(%)% +*+()) "%%%%%" ***-. -*-+*+(+( )())) )%%.%%%. ..-)) .%%.% %&%%% -+))(* &)))& 77777 .%%.%. +)))) + %%% )&777 777777 77777777 %)6%% )+++& %%(%(% +(++- (+(+& ".%... *)""!#"") --+---- 77&7&& &&(-) %%%-# "%%%! %%%%%.- %"%"%% %&%%&%%. )++-- 877777 %(%(% 5)%+%% %%%&% ..% !. *-%(%6) 777777777 7777777 %%.%. 777777 %%% 6 ++((+( 777777 777777 777777 777777 77777777 "%%%%*"" *%#%%% %%%66%) 777777 )))")%. ")"") &&&&&)& .%%%% ")%.".% %%%%6 +(*+--- -(+()++ 77778 #(%%! *&)&* -%%!-%% +---+ -%%** (""%)%*" &&%)& .".".") &&&)* %%.%& %.%%% ")"""" %%%&&+ )%%%+ 77777 77777777 )*".")( +)(+( ")"." """#! .)""( "%)")" +&+&& )"%)" ...%)") (++&(*& *%%*% +)+++ &&%*& %%%%% %%%%( (&&7777 ..%)"" %%%.% (+*+) )%%%)" %%&% )(())) +)))+ ))777 77777 ")%") )***-) .%.%.)!"% """")" ")%)"" **("- *)))* ((()( ")"%"* (---- "".!" *((--- )-- * !!")"""" %#")." (..")" (%%%% %%%%6 )+)-.%% &&777 "#""" #.%%%% 7777& )%)#""% %..%. 77777 77777 %+%&(%%% 777777777 77777 77778 (()() 77777 77777 %..%"" )+++& 77777777& ""#)"") ..")))))) %&&+&( +))+(& %%++)) ))))) &+%&& %(+*& %%%%%%% &5%(&*% 87777777 -)")" *+**+ %%%% %%% &%(&) 77777 -++)) )%("%"* "%")*) 77777 ..).).. %%&&(#% %%%%%% !%%%%%%%& )""%" %%&&( )+)+* %%%%%%%%% +)))+ )%%%% )**&)) %..%%"" (()((+-- ((+() &.%%%%% 77777 ")%")" )"")" +)))+ .%.%.%&"")" &&"") .!)..."" ((-**+ )")") #(""%. "#%.) )%%#) "#"%" %".""" %&&)&%. %%&%.- )".%" %%%&.%.&&%") %%%)%""") .%.-* -!-(+ 77&88: 77777777778: "".).. "!&%%! %&(#% 77777 %""") ..")" -*-.% +)&(& +%&+(% 6 %%%% %%%(%%+ %")))" 777777+ #"%%"%%% %%% )()+( %%!.%% -+(+)) 77777 %%%%!% %!%.% &&+%%* .&%%% "%"###. .%.%%%( (%)) %% )))))) 77777 777777 %%%%"" %&% % ""-***** &&(&&( 7777777 )#("" ."(-"" """%"%""%% &&(&& %6 %%% 77777 # %% 77777 %%%%% &+&&& #%%%%%. )&%%.%%%%%%.% &(&&+ %+)** ++&%&+ +++)& 77777 %%%.& %%.%"%%"( %%%%%%%)%% "%.") %%%%% 77777 (%%%%- 777777 7778: %"%.. "%%%% )))))++)) #.")(.)") 777777 )%"%"# 777777 77877777 &"#.- )".).. ")%"" -++*+ &7777 *(%%" -**&)**- *+--*)+* #--)+)+--! +)))+ %%%.# &&&'&%& %)%%.%%% %&%"--) ))*#%&% %))%%% %%%&& %)%%%%%%% 7&))) """") .%.") %&(&** %.%.%%.""" &&%%% & %%# (&((& )"")# %%%.% """"""" ##"%%&%% &%+&&# -- *****) %%%%%% &&+%&& %%%%% &((&& !!"!&' !"" ""!""" .+-.) -%%&&( % %%. ++%%&) ")))") ")))" "!""" )"%.% .%.%.% ..)%) !"")))" %%"."" """"** %")))) %")."" " %" .&&&& %.""" %%.") ..""". .%.%.).). .""%..)".% "")"" %%%%% %""%. """")"" &!&%!& %%%" !&( %&&&& %%%%%% %% !##-# "%%.% #%..% &&&&% %%%%%% %%%% % ")")) &&&&& %%"%%%% %%%%%% ))"".%..%.."") %%%%%%#%% )""""" %&&&&% %#%%&% "%"%%%%%#&% %"""))""") """"" &'&%%&& ."&&. %.."% %%%"" """%"" %%&&&&+ %#-+ "%&%% %%%%% ..%)% (%%.. --*-- %%%%%) %%%%%%"%% .%..% ....%% !&&%% .%.%% .%.%% .%...% 1INFO upclickSCRP on mousedown show cd bmp highup end mousedown on mouseUp lock screen hide cd bmp highup put the vertical linescroll of cd lst 1 - 1 into newscroll set the vertical linescroll of cd lst 1 to newscroll put the number of lines of cd lst 1 into numlines show cd bmp downarrow show cd btn downclick if newscroll is 1 then hide cd bmp uparrow hide cd btn upclick end if unlock screen end mouseUp inescr+BUT 2INFO downclickSCRP on mousedown show cd bmp highdown end mousedown on mouseUp lock screen hide cd bmp highdown put the vertical linescroll of cd lst 1 + 1 into newscroll set the vertical linescroll of cd lst 1 to newscroll put the number of lines of cd lst 1 into numlines show cd bmp uparrow show cd btn upclick if numlines-6 is newscroll then hide cd bmp downarrow hide cd btn downclick end if unlock screen end mouseUp f +TXT purchasedata Thank you for shopping with us. Enjoy your new clothes! INFO waitdata Calculating your selections... Please wait. noitemsSCRP on mouseup go back end mouseup No items selected. lculati+TXT outfitsdata 1 A. Klein, Loden Herringbone Jacket, $995. AK3 2 A. Klein, Jacquard Zipper Vest, $555. AK3 3 A. Klein, Loden Herringbone Pants, $535. AK3 4 A. Klein, Shaped Fly-Front Shirt, $335. AK3 5 A. Klein, Chocolate Twill Jacket, $955. AK4 6 A. Klein, Chocolate Jacquard Vest, $555. AK4 7 A. Klein Chocolate Twill Pants, $495. AK4 8 A. Klein, Camel Twill Overcoat, $1600. AK5 9 A. Klein, Camel Twill Pants, $575. AK5 10 A. Klein, Silk Jacquard Check Vest, $495. AK5 11 A. Klein, Satin One-Button Shirt, $535. AK5 12 A. Klein, Cashmere Skating Dress, $655. AK6 13 A. Klein, Stretch Cropped Jacket, $855. AK7 14 A. Klein, Stretch Rib Turtleneck, $235. AK7 15 A. Klein, Stretch Twill Mini-Skirt, $295. AK7 16 N. Miller, Micro Blue Slouch Coat, $350. NM1 17 N. Miller, Quasar Print T-Shirt, $ 95. NM1 18 N. Miller, Wool A-Line Skirt, $155. NM1 19 N. Miller, Raisin Lycra/Velvet Dress, $405. NM2 20 N. Miller, Coral Mohair Sweater, $125. NM3 21 N. Miller, Copper Pleated Skirt, $125. NM3 22 N. Miller, Grey Boiled Wool Coat, $350. NM4 23 N. Miller, Metallic Charcoal Bodysuit, $125. NM4 24 N. Miller, Grey Boiled Wool Skirt, $125. NM4 25 N. Miller, Red Wool Pantsuit, $660. NM5 26 N. Miller, Shiny Lycra T-Shirt, $ 65. NM5 27 N. Miller, Raisin Long-Sleeved Dress, $405. NM6 28 N. Miller, Raisin Velvet Quilted Vest, $305. NM6 29 N. Miller, Purple Polartec Dress, $255. NM7 30 N. Miller, Polartec Slouch Coat, $350. NM7 31 N. Miller, Black Wool Romper, $275. NM8 32 N. Miller, Red Lycra T-Shirt, $ 65. NM8 33 N. Miller, White Mohair Sweater, $165. NM9 34 N. Miller, Slate Velvet Skirt, $125. NM9 35 N. Miller, Blue Wool Wrap Dress, $255. NM10 36 N. Miller, Black Nylon Raincoat, $405. NM11 37 N. Miller, Red/Gray Wool Uni-dress, $255. NM11 38 A. Klein, Wool Pinstripe Vest, $695. AK1 39 A. Klein, Wool Pinstripe Jacket, $995. AK1 40 A. Klein, Foulard Shaped Shirt, $335. AK1 41 A. Klein, Wool Pinstriped Shorts, $355. AK1 42 A. Klein, Single Breasted Jacket, $995. AK8 43 A. Klein, Taupe Knit Sweater Vest, $150. AK8 44 A. Klein, Mushroom Striped Shirt, $445. AK8 45 A. Klein, Mushroom Striped Pants, $535. AK8 46 A. Klein, Navy Tuxedo Jacket, $1,155. AK9 47 A. Klein, Navy Satin Slim Pants, $575. AK9 48 A. Klein, Double Breasted Jacket, $975. AK2 49 A. Klein, Lavender Satin Blouse $435. AK2 50 A. Klein, Charcoal Pleated Pants, $575. AK2 51 A. Klein, Caramel Riding Jacket, $1,095. 52 A. Klein, Satin Floral Vest, $495. 53 A. Klein, Ivory Satin Collar Shirt, $435. 54 A. Klein, High Waist Wide Pants, $575. 55 E. Tracy, Black Leather Jacket, $695. ET2 56 E. Tracy, Black Leather Skirt, $315. ET2 57 E. Tracy, Poorboy Knit Sweater, $125. ET2 58 E. Tracy, Melange Wool Jacket, $355. ET10 59 E. Tracy, Melange Wool Kilt, $175. ET10 60 E. Tracy, Plaid Schoolgirl Jumper, $255. ET9 61 E. Tracy, Brown Plush Coat, $395. ET7 62 E. Tracy, Llama Knit Dress, $375. ET7 63 E. Tracy, Shawl Collar Coat, $655. ET1 64 E. Tracy, Breen Wool Jacket, $365. ET1 65 E. Tracy, Breen Wool Pants, $225. ET1 66 E. Tracy, Polo Button Sweater, $135. ET1 67 E. Tracy, Russet Plaid Wrap Coat, $455. ET5 68 E. Tracy, Shetland Plaid Skirt, $175. ET5 69 E. Tracy, Breen Polo Sweater, $135. ET5 70 E. Tracy, Bittersweet Suede Dress, $655. ET3 71 E. Tracy, Plum Suede Dress, $655. 72 E. Tracy, Topaz Suede Dress, $655. 73 E. Tracy, Navy Jersey Dress, $335. ET4 74 E. Tracy, Shearling Coat, $1,900. ET8 75 E. Tracy, Mocha Knit Tunic, $135. ET8 76 E. Tracy, Mocha Knit Skirt, $125. ET8 77 E. Tracy, Black Tuxedo Jacket, $445. ET6 78 E. Tracy, Satin Ottoman Skirt, $175. ET6 79 E. Tracy, White Ascot Shirt, $175. ET12 80 E. Tracy, Black Pinstriped Jacket, $425. ET12 81 E. Tracy, Black Slim Pants, $225. ET12 82 E. Tracy, Beaded Tank, $495. ET12 83 E. Tracy, Black Long Knit Dress, $225. ET11 84 Vittadini, Red Schoolgirl Kilt, $125. VT7 85 Vittadini, Red Boucle Tunic, $235. VT7 86 Vittadini, Black Turtleneck, $60. VT7 87 Vittadini, Black Evening Gown, $385. VT6 88 Vittadini, Black Baby Doll Dress, $325. VT5 89 Vittadini, Plum Velvet Knit Tunic, $265. VT4 90 Vittadini, Tangerine Sweater Set, $250. VT32 91 Vittadini, Tangerine Suede Skirt, $175. VT32 92 Vittadini, Pink Cropped Sweater, $135. VT31 93 Vittadini, Pink Suede A-line Skirt, $175. VT31 94 Vittadini, Black Quilted Coat, $325. VT2 95 Vittadini, Red Double Knit Cardigan, $185. VT2 96 Vittadini, Black Cotton Turtleneck $65. VT2 97 Vittadini, Tartan Hot Pants, $155. VT2 98 Vittadini, Black Leather Vest, $325. VT1 99 Vittadini, Argyle Turtleneck Sweater, $115. VT1 100 Vittadini, Tartan Cuffed Trousers, $185. VT1 96 Vittadi+BUT NINFO button id 78SCRP on mouseUp hide cd bmp purchase end mouseUp rtleneckPALT OINFO ^CARD NM1data 9+BiO wINFO runhighdata % / " 0&07 %( 07&07& !!!++++++**************((((*(,?,((*--((+--?-&&'(-?-)(-?-*,-*%--&%%)-,&%+?+&&&&'&&,?*''',-?-,(((((((((**(**(******??? 77777/ 77 777/ 7/*, 7/ 70*,% !!!'('''''&&''%'&&&%&%%&%7 /--$$ (-*(7 0-,( (--*07 (-,+( ---++,,,,,,,,,,?+,,?,???? .TAIL xINFO runwaySCRP on mousedown global gFSHlastmovietime, gFSHlastmovie global gFSHenablecard if gFShenablecard then show cd bmp runhigh lock screen gorunway gFSHlastmovie,gFSHlastmovietime end if end mousedown .......... %%%.%%%% .%.%" %%%"" .%%!& .%"... %%%.%. .%"%%% "%%&&&& &%&%%. .%.%. %%''% ---*. % "%" ""%%%) ***+* "")") %%%)% )%.%)%% %&%%% +*-+( %%%%%%)" )""""" %&%%%% %#"." %%%%.. #()%% "%" % )%%%% )#%%%& %%"%)%% %%%%% "..%% %"%%%%% +-*-* &%.%"%" %%%"%" %%"%% &*+"-" %&%%.. "%%!" %#%%%% (%&%% %%%%%%%% %%6 % )%"%%% %%%(! % %%% +)-%% %%)%%. &);5.!!8444!9 ):9:$($ %&)++* ****" %.%% % %%% %)%%% "%%&# %.%."%% "%%."" !5!!* 77777 )*((( -)-+( *-**) +%#%% 77777 "&%!& 77777777 /454% !!.:& <;546 *;;?/ !777%65! <4:;6& 77&%5 *)-.% ..%.. %%%(% !!54& &&)))& ),!:) %%.%% 77779 -%%%. :7:87 :7&)::&++ &&)+() 77777777 &))()&7 +-+-+ 777777 )())+ -***+* 77777 77777& &))(( ())&) 77777- 77777 77777777 77777 8:7777 */!%< 77777 :&&&&: 777777 !!!!! -9*9- 9.!!9!9!9! !!!9! !!9!9!9!9! !!9!9!9! )&))% 77&*> 7&)** (+-&7 --(&&&)& ))))&& )&)+- )7777 .%%%% %%%%%% 77&-- $7777777 7777777 &)&&)) 777777 )77777 77777 77&+- )++&+ ))))& 77777 777777 )&)+) 77777 )&)+* 77777 :777777 77777 *+)&- 87777 %...% 77)(( --)+*%% -"..% )-" ""(%% 77777 777++)+7 777777 &&&&(&%% 7777788 777778 .".)) %%%%%"%"& 77777) 777777 77777+ 77777 *&8777 % ))) ".%..% .)")%% 77777 877777 77777 77&98 .%.%% 77777 8&)77 7777777 .%.%% 77777 ..%") 77777 77777 ..%%.%) 7777777 .%.%% )))))& 7777777 &&877 77777777 %%%".) 77777 7777777 ))"") 7777& +)++& 7777777 )&(+& )+)&) %"%%%% "%"%%" )+++&)+ 777777)* &)))) +++)+ ##-*++ %%%%""..** 777777 7778777 &7777 &)+&& )7777 ""))"). ""))" &77777 77777 ")"""" ")""" ....))# %%%.% -%%%% 77777 77777 %.%)%%. "%%%% 77777 &"!))#!"#. #"%%% 7777777777 %")""# %%%"%" 777777777 77777777 7777777 .%...%.%%%%%& %.%%%%% %##!! "%"(% %.%%%% )"..% 77777 .%%%%.% %")""" )%(!#%&#!& 8777777 .#"%"""""" ".""" 77777 777778887 * %#"&5 77777777 77777 &% !&6 77777777- "%"%#- 777777 .)-."! #%%%% %%%.%% 77777 "-")"% 777777 *6 %% %%%%% %".%% %%%%%% %%..)&8 )"""" 77777 "...)" """"""#" <8888 <:<-- #%.%% %%%%%%%% %%%%." 77777 &((*+ )"")" %%%%%%% %%%%%.%%% ****- 777777 79--) % % %% %%%)% %..(%. *-*-- 7777777777 %%%%&.. .%...% &())& .%%%%% 77777 ))&)& %6%%%"-*+** -"%%% )&()( &)+*)&&&&& &)+++ %.%%. ))""" &*)"" 77777778) 77777 777777 ++))) 777777 77777 %"".) .")". #+%-- ))&)+ +&+&( 77777777 )&&&: 7777777 777777 % %.% %"""") )%%." 7777777 %.%%% %% "! + %(" 77777 %%%% &.%.%%+) "")"))) )&&))&& 7777777 .%%%8 77777 777777 +% %- -".%."- &7777 7:8:& 778<<: -!!;%" %%%%))# !.%%%) )(+)) 77777 -#%%% ))%." -% % )&)))&)) *#.%.%% 77777& 777778 %%%%- 777777 %%% .%% 77777 -*)*) +))))+ 777777 7777777 ))-%! -%% % ))**)* 7777777 888/8 .%..% 898/88/ %%%.% 777777 &-%% * -&777 788777 777779- )***))) (-*+(- 877899 8<<<< %%"%" ))+-- 88887 .%%-% ))&++ )")"" "%."% 77777777 %%%%)%%% 7777777 "&&%!" %)+--++ 777777 77777 %%%. .%%." ) .# &((+* . .) %%%% 7777777 877777 %%%%.% -%%%% %..%% 777777 %%.%% %.%. """)" ."""" .% %%% 77777 <<9::;<; 8)&&& ")%)% ))")* )&))+%. *+)+( %%%%%% %% "%%" %.%%% ..""%) %%"") %%%% ...*-)) ;&77777 777:< -&&(( 7777777 )+*+( )777777 %.%%% 777777 %%%%% 87777 !).) #.#)"%. )+- .% &**+& *(%%& %.%%%+%.% % .%.% %%%"%# .%%%.% 777777 )(&)& %"%%%""( ))))) *)+** --... 877788 ))777 +)&&( *(+)( (.)%%. *)+&++ .%.%.. (-%%&%% )&&&& %%% %6%% &%%&%% ))++- .%%%% (%.%%%%% #%%--- &%%%%%% (+++( &7777 )(--- 777777 :+)+) 7&))) %&&+%+ ))))) )))+-% +)((+ )7+&) .%.%.%%%%.% 777777 %""(! &&%*&% %%%%%% %.%%%%% )++)) 777++ ))))) -*&-%% *())( %%%# ))))) ".%"- **))( %.%%%"""% *)"%."%"! &)**- %%% +))++* +)))) (%%)%&%6 87777 %%%%% ! %%%%&%% &%%(- "%%%% %%%(%)% +*+()) "%%%%%" ***-. -*-+*+(+( )())) )%%.%%%. ..-)) .%%.% %&%%% -+))(* &)))& 77777 .%%.%. +)))) + %%% )&777 777777 77777777 %)6%% )+++& %%(%(% +(++- (+(+& ".%... *)""!#"") ---(%% 7777777 ""%%% .%.%. %%%%%% 777777 %%.%%% %"%%" -)* - 77777 %"""" %(%(% 5)%+%% %%%&% ..% !. *-%(%6) 777777777 7777777 %%.%. 777777 %%% 6 ++((+( 777777 777777 777777 777777 77777777 "%%%%*"" *%#%%% %%%66%) 777777 )))")%. ")"") &&&&&)& .%%%% ")%.".% %%%&% &%-+)) )))(+ %"".".") %%)". ))")* ))***&& -%%!-%% +---+ -%%** (""%)%*" +%*&& %%%%. 77777 %%.%& %.%%% ")"""" %%%&&+ )%%%+ 77777 77777777 )*".")( +)(+( 777777- +&+&& )"%)" ...%)") (++&(*& *%%*% +)+++ &&%*& %%%%% %%%%( (&&7777 ..%)"" %%%.% (+*+) )%%%)" %%&% )(())) +)))+ ))777 77777 ")%") )***-) .%.%.)!"% """")" ")%)"" **("- *)))* R((()( ")"%"* (---- "".!" *((--- )-- * !!")"""" %#")." (..")" (%%%% %%%%6 )+)-.%% &&777 "#""" #.%%%% 7777& )%)#""% %..%. 77777 77777 %+%&(%%% 777777777 77777 77778 (()() 77777 77777 %..%"" )+++& 77777777& ""#)"") ..")))))) %&&+&( +))+(& k%%++)) ))))) &+%&& %(+*& %%%%%%% &5%(&*% 87777777 -)")" *+**+ %%%% %%% &%(&) 77777 -++)) )%("%"* "%")*) 77777 ..).).. %%&&(#% %%%%%% !%%%%%%%& 97777 )""%" %%&&( )+)+* %%%%%%%%% +)))+ )%%%% )**&)) %..%%"" &.%%%%% .%"%) """)" &.%%%%% 77777 ")%")" )"")" &&877 77777 777777 77777 "")"* "%")" %%%%%%%%% )(()& 7777777 77777777 )"#." ""%")! %**)) "#"%" %".""" %&&)&%. %%&%.- )".%" %%%&.%.&&%") %%%)%""") .%.-* -!-(+ 77&88: 77777777778: "".).. "!&%%! %&(#% B77777 %""") ..")" -*-.% +)&(& +%&+(% 6 %%%% %%%(%%+ %")))" 777777+ #"%%"%%% %%% )()+( &7777 %%!.%% -+(+)) 77777 %%%%!% %!%.% &&+%%* .&%%% "%"###. .%.%%%( (%)) %% )))))) 77777 777777 %%%%"" %&% % ""-***** &+(&+ &(%) )"%"%""% &&(&&( 7777777 )#("" ."(-"" """%"%""%% &&(&& %6 %%% 77777 *(((- 77778: &+&&& #%%%%%. )&%%.%%%%%%.% &(&&+ %+)** ++&%&+ +++)& 77777 %%%.& %%.%"%%"( %%%%%%%)%% "%.") %%%%% 77777 (%%%%- 777777 7778: %"%.. 777777& -(%%% 777777 )%"%"# 777777 77877777 &"#.- )".).. ")%"" -**&)**- *+--*)+* #--)+)+--! +)))+ %%%.# &&'&%&%&%& (*"). ""&%..!%..". %&%"--) ))*#%&% %))%%% %%%&& %)%%%%%%% 7&))) """") .%.") %&(&** %.%.%%.""" &&%%% & %%# (&((& )"")# %%%.% """"""" (.%.% & 5&&%%& %%%%% &&+%&& %%%%% &((&& !!"!&' !"" ""!""" .+-.) -%%&&( % %%. ++%%&) ")))") ")))" "!""" )"%.% (.%.%.% ..)%) !"")))" %%"."" """"** %")))) %")."" " %" .&&&& %.""" %%.") ..""". .%.%.).). .""%..)".% "")"" %%%%% %""%. """")"" %)!"%""" %"#%% ").)) !!"))")" """""""! &&&&% %%%%%% %%%% % ")")) &&&&& %%"%%%% %%%%%% ))"".%..%.."") %%%%%%#%% )""""" %&&&&% %#%%&% "%"%%%%%#&% %"""))""") """"" &'&%%&& ."&&. %.."% %%%"" """%"" %%&&&&+ %#-+ "%&%% %%%%% ..%)% (%%.. --*-- %%%%%) %%%%%%"%% .%..% ....%% !&&%% .%.%% .%.%% .%...% &!&!& ;<779, 36>=(- ISCRP ------------------------------------------------------------------- 1994 Oracle Corporation. All rights reserved. -- Designed by Susan Kropf and Suzanne Walsh. -- Graphics by Suzanne Walsh. -- Scripting by Susan Kropf. ------------------------------------------------------------------- -- Note: -- This is a very truncated version of the Fashion Shopping application that -- was created for display at the Oracle "Information Superhighway" exhibit at -- Epcot Center. It is included here to give OMO developers an idea of some things that are -- possible with OMO. Since video was an integral part of the original application, -- especially for navigation, it is impossible to include the application as it was at Epcot. -- Everything has been removed here except one catalog card, -- and the final selections card. The buttons that would have navigated to a video -- are disabled, and the scripts for that part have been removed. on doinit -- Set current state of catalog cards on opencard global gFSHusersize, gFSHorditems, gFSHsizeitems, gFSHcarditems, gFSHindexitems, gFSHnumordered, gFSHsubtotal global gFSHdonesound3, gFSHcomefromselections,gFSHcardtype,gFSHuserhint,gFSHenablecard,gPathAudio stop bg timer "userhint" put "catalog" into gFSHcardtype put the short id of this card into cdid repeat with i = 1 to gFSHnumordered if item i of gFSHcarditems is cdid then do "show cd bmp check" & (item i of gFSHindexitems) do "hide cd bmp cover" & (item i of gFSHindexitems) do "put the members of cd grp out" & (item i of gFSHindexitems) && "into grpmem" repeat with j = 1 to the number of lines of grpmem hide line j of grpmem end repeat do "show cd bmp" && (item i of gFSHsizeitems) & (item i of gFSHindexitems) do "set the gsize of cd grp out" & (item i of gFSHindexitems) && "to" && (item i of gFSHsizeitems) end if end repeat if gFSHsubtotal is 0 then show cd bmp selectgray else hide cd bmp selectgray end if unlock screen -- Play the correct sound if gFSHdonesound3 is false then set the soundFile of background sound 1 to gPathAudio&"3A.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 put true into gFSHdonesound3 else if gFSHcomefromselections is true then set the soundFile of background sound 1 to gPathAudio&"3C.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 put false into gFSHcomefromselections else set the soundFile of background sound 1 to gPathAudio&"3B.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 end if end if put 3 into gFSHuserhint set the Messages of bg timer "userhint" to "1400,playhint" start bg timer "userhint" end doinit on doreset -- Reset catalog cards on closecard global gFSHsubtotal global gFSHenablecard stop bg timer "userhint" repeat with i = 1 to the itemcount of this card do "hide cd bmp check" & i do "show cd bmp cover" & i end repeat hide cd bmp selectgray hide cd bmp high1 hide cd bmp high2 hide cd bmp high3 hide cd bmp high4 end doreset on openstack global gCursorNormal -- Set path for sound files set the fullscreen to true set cursor to gCursorNormal hide toolbar hide menubar -- put line 3 of stacks into gNAVepcotpath -- if the last char of gNAVepcotpath is ":" then -- put empty into the last char of gNAVepcotpath -- end if setPaths resetstack end openstack on resetstack -- User has just entered stack, no items ordered global gFSHusersize, gFSHsizeitems, gFSHnumordered, gFSHorditems, gFSHcarditems, gFSHindexitems, gFSHsubtotal global gFSHdonesound1, gFSHdonesound2, gFSHdonesound3, gFSHdonesound4, gFSHdonesound5 global gPathAudio, gFSHcomefromselections, gFSHenablecard stop bg timer "userhint" put true into gFSHenablecard put M into gFSHusersize put empty into gFSHsizeitems put 0 into gFSHnumordered put empty into gFSHorditems put empty into gFSHcarditems put empty into gFSHindexitems put false into gFSHdonesound1 put false into gFSHdonesound2 put false into gFSHdonesound3 put false into gFSHdonesound4 put false into gFSHdonesound5 put false into gFSHcomefromselections put 0 into gFSHsubtotal end resetstack on cl stop bg timer "userhint" end cl on dotouch touchnum -- User touches on an item to order/unorder global gFSHusersize, gFSHorditems, gFSHsizeitems, gFSHcarditems, gFSHindexitems, gFSHnumordered, gFSHsubtotal global gFSHdonesound4 global gFSHuserhint global gFSHenablecard global gPathAudio if gFSHenablecard then -- Buffering for double-clicks/touches stop bg sound 1 stop bg timer "userhint" put 3 into gFSHuserhint set the Messages of bg timer "userhint" to "800,playhint" start bg timer "userhint" do "put the visible of cd bmp check" & touchnum && "into ordered" if not ordered then -- the item is not already ordered do "show cd bmp check" & touchnum lock screen -- set the size do "put the gsize of cd grp out" & touchnum && "into oldsize" do "hide cd bmp" && oldsize & touchnum do "show cd bmp" && gFSHusersize & touchnum -- show results do "hide cd bmp cover" & touchnum -- set the price add (the itemprice of the target) to gFSHsubtotal hide cd bmp "selectgray" unlock screen -- play the right sound if not gFSHdonesound4 then set the soundFile of background sound 1 to gPathAudio&"4A.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 put true into gFSHdonesound4 else set the soundFile of background sound 1 to gPathAudio&"4B.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 end if lock screen -- order the item add 1 to gFSHnumordered do "set the gsize of cd grp out" & touchnum && "to gFSHusersize" do "put the gsize of cd grp out" & touchnum && "into item gFSHnumordered of gFSHsizeitems" put the itemnum of the target into item gFSHnumordered of gFSHorditems put the short id of this card into item gFSHnumordered of gFSHcarditems put touchnum into item gFSHnumordered of gFSHindexitems unlock screen --with visual effect dissolve smooth else -- the item is ordered, so remove it from the list do "set the visible of cd bmp check" & touchnum && "to false" lock screen -- hide the size do "put the gsize of cd grp out" & touchnum && "into oldsize" do "set the visible of cd bmp" && oldsize & touchnum && "to false" do "show cd bmp cover" & touchnum -- unset the price subtract (the itemprice of the target) from gFSHsubtotal if gFSHsubtotal is 0 then show cd bmp selectgray end if unlock screen lock screen -- unorder the item put the itemnum of the target into curitem remove1item curitem unlock screen --with visual effect dissolve smooth set the soundFile of background sound 1 to gPathAudio&"4C.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 end if end if end dotouch on remove1item itemnum -- Remove an item from the global order list. -- (Workaround for the fact that "delete item i" wasn't working in the runtime version) global gFSHnumordered,gFSHorditems,gFSHsizeitems,gFSHcarditems,gFSHindexitems repeat with i = 1 to gFSHnumordered if item i of gFSHorditems is itemnum then if i = 1 then put item 2 to gFSHnumordered of gFSHorditems into gFSHorditems put item 2 to gFSHnumordered of gFSHsizeitems into gFSHsizeitems put item 2 to gFSHnumordered of gFSHcarditems into gFSHcarditems put item 2 to gFSHnumordered of gFSHindexitems into gFSHindexitems else if i = gFSHnumordered then put item 1 to i - 1 of gFSHorditems into gFSHorditems put item 1 to i - 1 of gFSHsizeitems into gFSHsizeitems put item 1 to i - 1 of gFSHcarditems into gFSHcarditems put item 1 to i - 1 of gFSHindexitems into gFSHindexitems else put (item 1 to i -1 of gFSHorditems) & "," & (item i + 1 to gFSHnumordered of gFSHorditems) into gFSHorditems put (item 1 to i -1 of gFSHsizeitems) & "," & (item i + 1 to gFSHnumordered of gFSHsizeitems) into gFSHsizeitems put (item 1 to i -1 of gFSHcarditems) & "," & (item i + 1 to gFSHnumordered of gFSHcarditems) into gFSHcarditems put (item 1 to i -1 of gFSHindexitems) & "," & (item i + 1 to gFSHnumordered of gFSHindexitems) into gFSHindexitems end if exit repeat end if end repeat subtract 1 from gFSHnumordered end remove1item on dogroup groupnum -- User touches on a size button. Group recieves the click and decides -- which size to show based on the mouse location. global gFSHusersize, gFSHorditems, gFSHnumordered, gFSHsizeitems global gFSHuserhint global gFSHenablecard put the mouseloc into mpt if gFSHenablecard then stop bg timer "userhint" put 3 into gFSHuserhint set the Messages of bg timer "userhint" to "800,playhint" start bg timer "userhint" do "put the members of cd grp out" & groupnum && "into grpmem" lock screen put false into donehit repeat with i = 1 to the number of lines of grpmem if mpt is within the rect of (line i of grpmem) then show (line i of grpmem) put char 1 of (the short name of (line i of grpmem)) into newsize if newsize is "X" then put "XL" into newsize do "set the gsize of cd grp out" & groupnum && "to newsize" put newsize into gFSHusersize put true into donehit else hide line i of grpmem end if end repeat if not donehit then -- User clicked on the group, but not within the rect of a size bitmap. do "put the gsize of cd grp out" & groupnum && "into mysize" do "show cd bmp" && mysize & groupnum else -- reset the size of the item in the global order list do "put the itemnum of cd grp out" & groupnum && "into curitem" repeat with i = 1 to gFSHnumordered if curitem is (item i of gFSHorditems) then do "put the gsize of cd grp out" & groupnum && "into item i of gFSHsizeitems" exit repeat end if end repeat end if unlock screen end if end dogroup on dostartover global gFSHcardtype, gFSHenablecard if gFShenablecard then show cd bmp high4 play stop stop bg sound 1 lock screen resetstack gonavigator hide cd bmp high4 end if end dostartover on goselections -- Go to the last card (list of all items ordered) global gFSHcardtype global gFSHdonesound5 global gFSHuserhint global gFSHenablecard global gPathAudio if gFSHenablecard then if not the visible of cd bmp selectgray then show cd bmp high2 put false into gFSHenablecard stop bg timer "userhint" play stop stop bg sound 1 lock screen go cd "selections" show cd bmp "purchase" show cd fld "wait" unlock screen docalc -- Create list of items to display. (In script of card "selections") if not gFSHdonesound5 then set the soundFile of bg snd 1 to gPathAudio&"5a.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 put true into gFSHdonesound5 else -- FIX THIS TO VARIABLE set the soundFile of background sound 1 to gPathAudio&"5B.aif" set the buffersize of background sound 1 to 180 set the playVolume of background sound 1 to 100 play background sound 1 end if end if end if end goselections on closestack global gPathAudio play stop stop bg sound 1 -- Must clear all alarms when we leave the stack! stop bg timer "userhint" put empty into gPathAudio end closestack on LogEntry myEntry -- Unused logging function exit logentry global gPathAudio put gPathAudio &":fashion:FSHapp.log" into logfile -- Log runtime behavior open file logfile read from file logfile until "@" write the date && the time && myEntry && Return to file logfile close file logfile end LogEntry on gonavigator -- Used to return to navigator stack. Changed for demo purposes. global gPathAudio go cd "NM1" --go cd "OTV" unlock screen realize cd palette "NM1" end gonavigator function curDir put the long name of this stack into sN delete word 1 of sN delete char 1 of sN put 1 into off put length(sN)-1 into sL if the platform = "Macintosh" then put ":" into pathSep else put "\" into pathSep repeat forever get offset(pathSep, char off to sL of sN) if it 0 then add it to off else exit repeat end repeat return char 1 to off-1 of sN end curDir on setPaths global gWindows put the platform = "Windows" into gWindows global gPath, gPathAudio, gPathVideo put curDir() into gPath put gPath&"Audio" into gPathAudio put gPath&"Video" into gPathVideo if gWindows then put "\" after gPathAudio put "\" after gPathVideo else put ":" after gPathAudio put ":" after gPathVideo end if end setPaths PFONT AG BOOK STENCIL APPLE CHANCERY ARIAL ARIAL NARROW ARIAL ROUNDED MT BOLD ATHENS AVANT GARDE B BAUERBODONI BOLD B COURIER BOLD B FRANKLIN GOTHIC DEMI B FRUTIGER BOLD B FUTURA BOLD B HELVETICA BOLD B ITCKABEL BOLD B ORCGARAM BOLD B TIMES BOLD BAUERBODONI BAUERBODONI BLACK BAUERBODONI BLACKCOND BAUERBODONI BLACKITALIC BAUERBODONI BOLDCOND BAUHAUS 93S BERLINER GROTESK LIGHT BERNHMOD AP BI BAUERBODONI BOLDITALIC BI COURIER BOLDOBLIQUE BI FRANKLIN GOTHIC DEMIOBLIQUE BI FRUTIGER BOLDITALIC BI HELVETICA BOLDOBLIQUE| BI TIMES BOLDITALIC BIFFO MT BIRCH BK ITALIA BOOK< BK ITCKABEL BOOK BO FUTURA BOLDOBLIQUE BODONI BD BT BODONI BDIT BT BODONI BT BODONI IT BT BOOK ANTIQUA BOOKMAN BOOKMAN OLD STYLE BOOKMAN OLD STYLE BOLD BRAGGADOCIO BRITANNIC BOLD BRUSH SCRIPT BRUSH SCRIPT MT C FUTURA CONDENSED C HELVETICA CONDENSED C UNIVERS 57 CONDENSED CAIRO CARTA CASLON540 BT CASLON540 IT BT CB FUTURA CONDENSEDBOLD CB HELVETICA CONDENSED BOLD CB UNIVERS 67 CONDENSEDBOLD CBI HELVETICA CONDENSED BOLDOBL CBO FUTURA CONDBOLDOBLIQUE CBO UNIVERS 67 CONDBOLDOBL CENTURY GOTHICP CENTURY SCHOOLBOOKP CHICAGO CI HELVETICA CONDENSED OBLIQUEP CL FUTURA CONDENSEDLIGHT CL HELVETICA CONDENSED LIGHT CL UNIVERS 47 CONDENSEDLIGHT CLB HELVETICA CONDENSED BLACK CLBI HELVETICA CONDENSED BLACKO CLI HELVETICA CONDENSED LIGHTOB CLO FUTURA CONDLIGHTOBLIQUE CLO UNIVERS 47 CONDLIGHTOBL CO FUTURA CONDENSEDOBLIQUE CO UNIVERS 57 CONDOBLIQUE COLONNA MT COMMERCIALPI BT CONCORDE BE ITALIC CONCORDE BE MEDIUM CONCORDE BE MEDIUMITALIC CONCORDE BE REGULAR COURIER COURIER NEW CRITTER CUTOUT CXB FUTURA CONDEXTRABOLD CXBO FUTURA CONDEXTRABOLDOBLIQU D ITCKABEL DEMI DELTA BOOK DELTA BOOKITALIC DESDEMONA EMIGREEIGHT EMIGREFIFTEENc' EMIGREFOURTEEN EMIGRETEN ENGRAVERS LH BOLD FACEP ESPY SANS ESPY SANS BOLD ESPY SERIF ESPY SERIF BOLD EWORLD TIGHT FIXEDSYS FOOTLIGHT MT LIGHT FORMATA OUTLINE FRANKFURTERMEDIUM FRANKLINGOTHIC FUTURA FUTURA BD BT FUTURA BDIT BTP FUTURA BK BT FUTURA BKIT BT FUTURA BOOK FUTURA MD BT FUTURA MDIT BT GENEVA GENEVA GIDDYUP GIDDYUP THANGSP GILL SANS EXTRABOLDDISPLAY GILLSANS GILLSANS BOLD GILLSANS BOLDITALIC GILLSANS ITALIC GOUDY TEXT MT H FRANKLIN GOTHIC HEAVY H FUTURA HEAVY HELVETICA HI FRANKLIN GOTHIC HEAVYOBLIQUE HO FUTURA HEAVYOBLIQUE HOEFLER HOEFLER ORNAMENTS I BAUERBODONI ITALIC I COURIER OBLIQUE I FRANKLIN GOTHIC BOOKOBLIQUE I FRUTIGER ITALIC I HELVETICA OBLIQUE I ORCGARAM LIGHTITALIC I TIMES ITALICP IMPACT IMPRESS BT INVISIBLE JAPANESE JUNIPER KINO MT L FRUTIGER LIGHT L FUTURA LIGHTP LI FRUTIGER LIGHTITALIC LO FUTURA LIGHTOBLIQUE LONDON LOS ANGELES LOTYPE MEDIUM LOTYPE MEDIUMITALIC M ITCKABEL MEDIUM MATRIX MATRIXBOLD MATRIXBOOK MATURA MT MATURA MT SCRIPT CAPITALS MINION EXPERT MINION EXPERT BLACK MINION EXPERT BOLDP MINION EXPERT BOLD ITALIC MINION EXPERT DISPLAY> MINION EXPERT DISPLAY ITALIC MINION EXPERT ITALIC MINION EXPERT SEMIBOLD MINION EXPERT SEMIBOLD ITALIC MINION ORNAMENTS MINION SWASH DISPLAY ITALIC MINION SWASH ITALIC MINION SWASH SEMIBOLD ITALIC MISTRAL MOBILE MONA LISA SOLID MONACO{ MONOTYPE CORSIVA MONOTYPE SORTS MS LINEDRAW MS SERIF MT EXTRA}m MYRIAD HEADLINE MYRIAD SKETCH MYRIAD TILT MYTHOS N HELVETICA NARROW NEW CENTURY SCHLBK NEW YORK O FUTURA BOOKOBLIQUE O FUTURA OBLIQUE OCR-A ORCGARAM PALACE SCRIPT MT PALATINO PALEX PLAYBILL POST ANTIQUA BE MEDIUMP POST ANTIQUA BE REGULAR PROFONT QUAKE QUICKTYPE QUICKTYPE CONDENSED QUICKTYPE MONOP QUICKTYPE PI R 2MODFRUTIGER ROMAN R FRUTIGER ROMAN ROCKWELL BOLDCONDENSED ROCKWELL CONDENSED SAN FRANCISCO SCOTCH ROMAN MT SCOTCH ROMAN MT ITALICP SCRIPT MT BD SMALL FONTS SNELL BT STENCIL STUDZ SYMBOLe TEKTON TEKTON BOLD TIMES TIMES NEW ROMAN TOOLBOX TORONTO TRADEGOTHIC TRADEGOTHIC BOLD TRADEGOTHIC BOLDOBLIQUE TRADEGOTHIC BOLDTWO TRADEGOTHIC BOLDTWOOBLIQUE TRADEGOTHIC LIGHT TRADEGOTHIC LIGHTOBLIQUE TRADEGOTHIC OBLIQUE TRADEGOTHIC-BOLDCONDTWENTY TRADEGOTHIC-BOLDCONDTWENTYOBL, U ITCKABEL ULTRA UNIVERS 55 UNIVERS BLACKEXT UNIVERS BLACKEXTOBL UNIVERS BOLDEXT UNIVERS BOLDEXTOBLP UNIVERS EXTENDED UNIVERS EXTENDEDOBL UNIVERS EXTRABLACKEXT UNIVERS EXTRABLACKEXTOBL UTOPIA HEADLINE VECTORA LH BLACK VECTORA LH BLACK ITALIC VECTORA LH BOLD VECTORA LH BOLD ITALICf VECTORA LH ITALIC VECTORA LH LIGHT VECTORA LH LIGHT ITALIC VECTORA LH ROMAN VENICE VIVALDI VOYAGER WIDE LATIN WINGDINGS XB FUTURA EXTRABOLD XBO FUTURA EXTRABOLDOBLIQUE ZAPF CHANCERY ZAPF DINGBATS ZAPFHUMNST BD BT ZAPFHUMNST BDIT BT ZAPFHUMNST BT ZAPFHUMNST IT BT ZAPFHUMNST ULT BT ZAPFHUMNST ULTIT BT ZURICH BDXCN BT ZURICH BLK BT ZURICH BLKIT BTIDMO IIDBK